(mail-hist-current-header-name): Use buffer-substring-no-properties.

diff --git a/lisp/mail/mail-hist.el b/lisp/mail/mail-hist.el
index 25bdcc2e55f58efbb850ac6d50868ccbdf932289..00a7d1c56ff3a128830f2eac21384fde7592482a 100644 (file)
--- a/lisp/mail/mail-hist.el
+++ b/lisp/mail/mail-hist.el
@@ -117,7 +117,7 @@ the message."
         (and
          name-start
          name-end
-         (downcase (buffer-substring name-start name-end)))))))
+         (downcase (buffer-substring-no-properties name-start name-end)))))))
 
 (defsubst mail-hist-forward-header (count)
   "Move forward COUNT headers (backward if COUNT is negative).